home *** CD-ROM | disk | FTP | other *** search
/ Visual Basic Source Code / Visual Basic Source Code.iso / vbsource / smfdoor / frmother.frm (.txt) < prev    next >
Visual Basic Form  |  1999-08-13  |  2KB  |  57 lines
  1. VERSION 5.00
  2. Begin VB.Form frmother 
  3.    BackColor       =   &H00000000&
  4.    BorderStyle     =   1  'Fixed Single
  5.    Caption         =   "Recent Sites"
  6.    ClientHeight    =   1380
  7.    ClientLeft      =   4260
  8.    ClientTop       =   3105
  9.    ClientWidth     =   2250
  10.    Icon            =   "frmother.frx":0000
  11.    LinkTopic       =   "Form1"
  12.    MaxButton       =   0   'False
  13.    MinButton       =   0   'False
  14.    ScaleHeight     =   1380
  15.    ScaleWidth      =   2250
  16.    Begin VB.CommandButton cmdDone 
  17.       Caption         =   "Done"
  18.       Height          =   375
  19.       Left            =   480
  20.       TabIndex        =   1
  21.       Top             =   840
  22.       Width           =   1215
  23.    End
  24.    Begin VB.Label lblRecentsites 
  25.       BackColor       =   &H80000012&
  26.       Caption         =   "Recent Sites"
  27.       BeginProperty Font 
  28.          Name            =   "MS Sans Serif"
  29.          Size            =   12
  30.          Charset         =   0
  31.          Weight          =   700
  32.          Underline       =   0   'False
  33.          Italic          =   0   'False
  34.          Strikethrough   =   0   'False
  35.       EndProperty
  36.       ForeColor       =   &H00FF0000&
  37.       Height          =   375
  38.       Left            =   240
  39.       MousePointer    =   10  'Up Arrow
  40.       TabIndex        =   0
  41.       Top             =   240
  42.       Width           =   1695
  43.    End
  44. Attribute VB_Name = "frmother"
  45. Attribute VB_GlobalNameSpace = False
  46. Attribute VB_Creatable = False
  47. Attribute VB_PredeclaredId = True
  48. Attribute VB_Exposed = False
  49. Private Sub cmdDone_Click()
  50.     frmother.Hide
  51.     frmHElp.Show
  52. End Sub
  53. Private Sub lblRecentsites_Click()
  54.     frmRecentsites.Show
  55.     frmother.Hide
  56. End Sub
  57.